home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / tex-k / tex-k-archive.past / tex-k-archive.gz / tex-k-archive / 000284_neal@ctd.comsat.com_Tue Feb 8 06:00:00 1994.msg < prev    next >
Internet Message Format  |  1994-10-11  |  6KB
  1. Received: from neal.ctd.comsat.com by cs.umb.edu with SMTP id AA13586
  2.   (5.65c/IDA-1.4.4 for <tex-k@cs.umb.edu>); Tue, 8 Feb 1994 11:00:04 -0500
  3. Received: by neal.ctd.comsat.com (Smail3.1.28.1 #29)
  4.     id m0pTur5-0002fOC; Tue, 8 Feb 94 11:00 EST
  5. Message-Id: <m0pTur5-0002fOC@neal.ctd.comsat.com>
  6. Date: Tue, 8 Feb 94 11:00 EST
  7. From: neal@ctd.comsat.com (Neal Becker)
  8. To: tex-k@cs.umb.edu
  9. Subject: gsftopk + xdvik solved
  10.  
  11. I just needed to fool with MakeTeXPK.  Here is one that works for me:
  12. sorry - it still needs some cleanup
  13.  
  14. #!/bin/sh -x
  15. # original MakeTeXPK -- make a new PK font, because one wasn't found.
  16. # 
  17. # (If you change or delete the word `original' on the previous line,
  18. # installation won't write this MakeTeXPK over yours.)
  19. # 
  20. # Parameters:
  21. #
  22. #   name dpi bdpi magnification [mode]
  23. #
  24. #   `name' is the base name of the font, such as `cmr10'.
  25. #   `dpi' is the resolution the font is needed at.
  26. #   `bdpi' is the base resolution, used to intuit the mode to use.
  27. #   `magnification' is a string to pass to MF as the value of `mag'.
  28. #   `mode', if supplied, is the mode to use.
  29. #
  30. # This script must echo the name of the generated PK file (and nothing
  31. # else) to standard output. Yes, this is different from the original dvips.
  32.  
  33. echo "Running MakeTeXPK $*" 1>&2
  34.  
  35. # Where to put the new file. The Makefile substitutes for this value.
  36. #: ${DESTDIR=${MTP_DESTDIR-/usr/local/lib/texmf/fonts/tmp/pk}}
  37.  
  38. # Define to `gsftopk' or `ps2pk' or whatever to make PK files for
  39. # PostScript fonts. If this is defined, MAPFILE must also be defined to
  40. # be your psfonts.map file or some equivalent. The Makefile substitutes
  41. # for this, too. You can get gsftopk from
  42. # math.berkeley.edu:pub/Software/TeX/gsftopk.tar.Z.
  43. : ${gsftopk=/usr/local/bin/gsftopk}
  44. : ${MAPFILE=/usr/local/lib/texmf/dvips/psfonts.map}
  45.  
  46. # If this directory doesn't exist, the Sauter stuff won't be attempted.
  47. : ${sauterdir=/usr/local/src/TeX+MF/tex82/utilities/sauter}
  48.  
  49. # Likewise, for the F3 stuff.
  50. : ${f3dir=/groups/dtrg/typescaler/fonts/f3b}
  51.  
  52. # TEMPDIR needs to be unique for each process because of the possibility
  53. # of simultaneous processes running this script.
  54. TEMPDIR=${TMPDIR-/tmp}/mtpk.$$
  55.  
  56. NAME=$1
  57. DPI=$2
  58. BDPI=$3
  59. MAG=$4
  60. MODE=$5
  61.  
  62. # If an explicit mode is not supplied, try to guess. You can get a
  63. # complete list of extant modes from ftp.cs.umb.edu:pub/tex/modes.mf.
  64. if test -z "$MODE"; then
  65.   case "$BDPI" in
  66.     85) MODE=sun;;
  67.    118) MODE=lview;;
  68.    300) MODE=CanonCX;;
  69.    600) MODE=ljfour;;
  70.   1270) MODE=LinotypeOneZeroZero;;
  71.      *) echo "MakeTeXPK doesn't have a guess for $BDPI dpi devices." 1>&2
  72.         echo "Put the mode in a config file, or update MakeTeXPK." 1>&2
  73.         exit 1
  74.   esac
  75. fi
  76.  
  77. DESTDIR=/usr/local/lib/texmf/fonts/$MODE
  78.  
  79. umask 0
  80.  
  81. GFNAME=$NAME.$DPI'gf'
  82. PKNAME=$NAME.$DPI'pk'
  83.  
  84. # Have we been spuriously called? No harm done, if so.
  85. if test -r $DESTDIR/$PKNAME; then
  86.   echo "$DESTDIR/$PKNAME already exists!" 1>&2
  87.   echo $DESTDIR/$PKNAME
  88.   exit 0
  89. fi
  90.  
  91. # Clean up on normal or abnormal exit.
  92. trap "cd /; rm -rf $TEMPDIR $DESTDIR/pktmp.$$" 0 1 2 15
  93.  
  94. # Do we have a GF file in the current directory?
  95. if test -r $GFNAME; then
  96.   echo "gftopk ./$GFNAME $PKNAME" 1>&2
  97.   gftopk ./$GFNAME $PKNAME
  98.   # Don't move the font; if the person knows enough to make fonts, they
  99.   # know enough to have . in the font paths.
  100.   echo $PKNAME
  101.   exit 0
  102. fi
  103.  
  104. # Do we have an F3 font?
  105. if test -r $f3dir/$NAME.f3b; then
  106.   # You will need Sun's f3tobm program, plus a program I wrote.
  107.   # See ftp.cs.umb.edu:private/f3totex.
  108.   cd $f3dir || exit 1
  109.   echo "f3topk -r $DPI $NAME" 1>&2
  110.   if f3topk -r $DPI $NAME; then
  111.     # Best if f3topk echoes its output filename, I think.
  112.     exit 0
  113.   else
  114.     echo "f3topk failed." 1>&2
  115.     exit 1
  116.   fi
  117. fi
  118.  
  119. # Is this a PostScript font?
  120. if test -n "$gsftopk" && egrep \^$NAME'([     ]|$)' $MAPFILE >/dev/null; then
  121.   echo "Running $gsftopk $NAME $DPI." 1>&2
  122.   $gsftopk $NAME $DPI 1>&2
  123.   if test $? -ne 0; then
  124.     echo "$gsftopk failed."
  125.     exit 1
  126.   fi
  127. else
  128.   
  129. # We're down to trying Metafont.  Since we want to run it in a
  130. # temporary directory, add the current directory to MFINPUTS.
  131. MFINPUTS=`pwd`:${MFINPUTS}:
  132. export MFINPUTS
  133.  
  134. test -d $TEMPDIR || mkdir $TEMPDIR 
  135. cd $TEMPDIR || exit 1
  136.  
  137. # Which version of Metafont shall we use?
  138. case $NAME in
  139.   cm*) mf=cmmf;;
  140.     *) mf=mf;;
  141. esac
  142.  
  143.  
  144. # Run Metafont. 
  145. echo "Running $mf \mode:=$MODE; mag:=$MAG; scrollmode; input $NAME" 1>&2
  146. $mf "\mode:=$MODE; mag:=$MAG; scrollmode; input $NAME" </dev/null 1>&2
  147.  
  148. if test -d $sauterdir && test $? -eq 1 && test $mf = cmmf; then
  149.   echo "Trying interpolated/extrapolated (Sauter) CM source." 1>&2
  150.   # Perhaps no such MF source file, and it's CM.  Try Sauter's scripts.
  151.   cd $sauterdir
  152.   rootfont=`echo $NAME | sed 's/[0-9]*$//'`
  153.   pointsize=`echo $NAME | sed 's/^\(.*\)\([0-9]*\)$/\1/'`
  154.   make-mf $rootfont $pointsize
  155.   $mf "\mode:=$MODE; mag:=$MAG; scrollmode; input mf/$NAME" </dev/null
  156.   if test $? -eq 0 && test -r $GFNAME; then
  157.     mv $GFNAME $TEMPDIR
  158.   fi
  159.   rm -f $NAME.log mf/$NAME
  160.   cd $TEMPDIR
  161. fi
  162.  
  163. if test ! -r $GFNAME; then
  164.   # Maybe it succeeded at DPI +- 1?  Annoying to have to check for this,
  165.   # but means we can use floating-point in the sources, so fine.
  166.   test_dpi=`expr $DPI - 1`
  167.   test_name=$NAME.${test_dpi}
  168.   if test -r ${test_name}gf; then
  169.     GFNAME=${test_name}gf
  170.     PKNAME=${test_name}pk
  171.   else
  172.     test_dpi=`expr $DPI + 1`
  173.     test_name=$NAME.${test_dpi}
  174.     if test -r ${test_name}gf; then
  175.       GFNAME=${test_name}gf
  176.       PKNAME=${test_name}pk
  177.     else
  178.       echo "MakeTeXPK failed to make $GFNAME." 1>&2
  179.       exit 1
  180.     fi
  181.   fi
  182. fi
  183.  
  184. # Metafont succeeded.  Make the PK file.
  185. gftopk ./$GFNAME $PKNAME
  186.  
  187. fi
  188. test -d $DESTDIR \
  189.   || mkdir $DESTDIR \
  190.   || (echo "${DESTDIR}: MakeTeXPK could not create directory." 1>&2; exit 1)
  191.  
  192. # Install the PK file carefully, since others may be working simultaneously.
  193. mv $PKNAME $DESTDIR/pktmp.$$ \
  194.   || (echo "$0: Could not mv $PKNAME $DESTDIR/pktmp.$$." 1>&2; exit 1)
  195.  
  196. cd $DESTDIR || exit 1
  197. mv pktmp.$$ $PKNAME
  198.  
  199. # If this line (or an equivalent) is not present, dvipsk/xdvik will think
  200. # MakeTeXPK failed.  Any other output to stdout will likewise lose.
  201. echo $DESTDIR/$PKNAME